' Defining local variables to store the property values.
Private m_DisplayField As Integer
Private m_TableName As String

    Public Property DisplayField() As Integer
        Get
            DisplayField = m_DisplayField
        End Get
        Set(ByVal Value As Integer)
            m_DisplayField = Value
        End Set
    End Property

    Public Property TableName() As String
        Get
            TableName = m_TableName
        End Get
        Set(ByVal Value As String)
            m_TableName = Value
        End Set
    End Property
